/*
	Purpose: Calculates share of 1940 Census fathers that 
	         report each of the coarsened ANES occupations. 

	Creates: fatherocc_shares_1940census.dta

*/

clear
set more off
cd "$Mydirectory1/1_DataSources/CensusData/"

use ./input/Census1940_fathers_ages30to50_forIncomeScores.dta, clear 

*------------------------------------------------------------------------------------*
*------------------------------------------------------------------------------------*
	
* Collapse 
	gen number = 1
	egen total_pop = sum(number)
	
	collapse (sum) number (mean) total_pop, by(occ1950ej)
	
	gen share = (number / total_pop)*100
	
	save ./output/fatherocc_shares_1940census.dta, replace
